myvar_2 = GlobalObjManager["getObjectIdFromGUID"](GlobalObjManager, -324607935)
	if (myvar_2 == 0) then
	myvar_2 = GlobalObjManager["getObjectIdFromGUID"](GlobalObjManager, 969733185)
		if (myvar_2 == 0) then
		SetScriptReturnValue(False)
	end
end
myvar_3 = GetObjectData(myvar_2, ObjData["direction"])
myvar_4 = GetConstantWithGuid(214574139, 4102, 2)
local myvar_7 = 4102
myvar_5 = GetConstantWithGuid(214574139, myvar_7, 3)
myvar_7 = GlobalObjManager

myvar_7 = GlobalObjManager["getObjectIds"](myvar_7, GlobalObjManager["kQuery_ByObjectDataField"], ObjData["category"], 22)
for loopvar1, loopvar2 in myvar_7 do 
	if (myvar_3 ~= GetObjectData(loopvar2, ObjData["direction"])) then
		if (math["mod"]((GetObjectData(loopvar2, ObjData["direction"]) + 4), 8) ~= myvar_3) then
		GlobalObjManager["getObjectIds"](myvar_7, GlobalObjManager["kQuery_ByObjectDataField"], ObjData["category"], 22)[loopvar1] = nil
	end
end
end
myvar_7, loopvar0 = nil
for loopvar1, loopvar2 in GlobalObjManager["getObjectIds"](myvar_7, GlobalObjManager["kQuery_ByObjectDataField"], ObjData["category"], 22) do 
for loopvar1, loopvar2 in GlobalObjManager["getObjectIds"](GlobalObjManager, GlobalObjManager["kQuery_ForPartsofMultiTileObject"], nil) do 
	if (GetObjectData(loopvar2, ObjData["room"]) == 0) then
	local myvar_16 = True
else
		if (0 < GetObjectData(loopvar2, ObjData["room"])) then
		local myvar_15 = True
		myvar_7 = loopvar2
	end
end
end
	if (myvar_16 == True) then
		if (myvar_15 == True) then
		for loopvar1, loopvar2 in GlobalObjManager["getObjectIds"](GlobalObjManager, GlobalObjManager["kQuery_ByObjectDataField"], ObjData["room"], GetObjectData(loopvar2, ObjData["room"])) do 
		myvar_22 = GetObjectData(loopvar2, ObjData["For Sale Flags"])
			if (myvar_22 == 0) then
			GlobalObjManager["getObjectIds"](GlobalObjManager, GlobalObjManager["kQuery_ByObjectDataField"], ObjData["room"], GetObjectData(loopvar2, ObjData["room"]))[loopvar1] = nil
		end
		end
		local myvar_18 = 0
		loopvar1, loopvar2, myvar_22 = nil
		for loopvar1, myvar_22 in GlobalObjManager["getObjectIds"](GlobalObjManager, GlobalObjManager["kQuery_ByObjectDataField"], ObjData["room"], GetObjectData(loopvar2, ObjData["room"])) do 
		myvar_23 = GlobalObjManager["getDistanceBetweenObjects"](GlobalObjManager, myvar_22, myvar_7)
			if (myvar_23 <= myvar_4) then
			myvar_18 = myvar_18 + 1
		end
		end
		myvar_19 = GetObjectData(nil, ObjData["room"])
			if (myvar_18 >= myvar_5) then
				if (0 < myvar_19) then
			else
				GlobalObjManager["getObjectIds"](myvar_7, GlobalObjManager["kQuery_ByObjectDataField"], ObjData["category"], 22)[nil] = nil
			end
		end
	end
end
end
for loopvar1, loopvar2 in GlobalObjManager["getObjectIds"](myvar_7, GlobalObjManager["kQuery_ByObjectDataField"], ObjData["category"], 22) do 
myvar_15 = {}
myvar_16 = loopvar2
table["insert"](myvar_15, myvar_16)
end
myvar_10 = table["getn"]({})
	if (0 < myvar_10) then
	local myvar_13 = 0
	SetTemp(myvar_13, {}[math["random"](myvar_10)])
else
	local myvar_12 = False
	SetScriptReturnValue(myvar_12)
end
